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RRRRRRRR PPPPPPPP GGGGGGGG MM MM SSSSSSSS GGGGGGGG PPPPPPPP TTTTTTTTTT RRRRRRRR ; 
RRRRRRRR PPPPPPPP GGGGGGGG MM MM SSSSSSSS GGGGGGGG PPPPPPPP TTTTTTTTTT RRRRRRRR : 
RR RR PP PP GG MMMM MMMM SS GG PP PP TT RR RR ; 
RR RR PP PP GG MMMM MMMM SS GG PP PP TT RR RR : 
RR RR PP PP GG MM S$ GG PP PP TT RR RR ; 
RR RR PP PP GG MM MM MM SS GG PP PP TT RR RR ; 
RRRRRRRR PPPPPPPP GG MM MM SSSSSS GG PPPPPPPP TT RRRRRRRR ; 
RRRRRRRR PPPPPPPP GG MM MM SSSSSS GG PPPPPPPP TT RRRRRRRR : 
RR RR PP GG GGGGGG MM MM SS GG GGGGGG PP TT RR RR ; 
RR RR PP GG GGGGGG MM MM SS GG GGGGGG PP TT RR RR ; 
RR RR PP GG GG MM MM SS GG GG PP TT RR RR cece ; 
RR RR PP G MM SS 6G GG PP TT RR RR cee : 
RR RR PP GGGGGG MM MM SSSSSSSS GGGGGG PP TT RR RR cece H 
RR RR PP GESG6G6G MM MM SSSSSSSS GGGGGG PP TT RR RR cove : 
LL III] SSSSSSSS H 
LL III! SSSSSSSS ; 
I SS ; 
I S$ ; 
I SS : 
I SS 
I SSSSSS 
I SSSSSS 
I SS 
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! VAX=11 RPGII Run-Time error patie values/message IDs 
; File: RPGMSG.MSG, Edit: DG10 


PETIIILILILILLLTI LILLE LLL tiiiiiiiiiiiiiit 
'® 

it COPYRIGHT (c) 1978, 1980, 1982, 1984 B 

ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 

it ALL RIGHTS RESERVED 


® 
® 
® 
® 
® 
SHED UNDER A LICENSE AND MAY BE USED AND COPIED 
TH OTHE TERMS | OF | SUCH LICENSE AND WITH THE 
is INCLUS e ABO COPYRIGHT NOTICE. THIS S SOFTWARE OR “ANY. OTHER 
is COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
it OTHER PERSON, NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
is TRANSFERRED. ‘ 
® 
is THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
is AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
is CORPORATION. ‘ 
* 
® 
* 
® 
* 
* 


!® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!® SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


VR RRR RRR EERE EERE EERE EERE RARER EEE EERE 


i Edit History: 


i 1-001 - Original. DG 8-Mar-1983 
! 1-002 - Changed wording of INVNUMENT. DG 17-Aug-1983 


' 
! 
' 
i] 
i] 
' 
i+ 
Symbols are defined following the standard for global names: 
} RPG$_abcmnoxyz 

In addition, the library standards specify that the letters ‘‘abc’’, ''‘mno’’, 
; 
! 


! and ‘‘xyz"’ are the first three letters of the first three words of the error 
! message, not counting articles and prepositions. 


} MACRO-32 Programming: 

The macro call: 

SRPGDEF 

will cause all symbols to be made available to the poeta. 
' 


! The Run-time Library declares these symbols as EXTERN 
! the macros are provided only ior the convenience of “4 user. 
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Message definitions 


1984 02:09:57 VAX=-11 Message y04-00 p 
“1984 9:41:29 DISKSVMSMASTER:ERPGRTL.SRCIRPGHSG.MSG;1 29° > 


28 
9! 
60 ! 
6} : ; Note: Error codes must not overlap success codes!!! 
8 - TITLE RPGSMSGDEF 
64 - IDENT *1-001' 
000000F9 eg «FACILITY RPG,249 /SYSTEM 
6 
68 «SEVERITY "pple 
$° -BASE 
00F 98003 71 FORFILE <for file !AS>/FAO = 1 
OOF 98008 ae INVNUMENT <Numeric entry is invalid or out of range. Re-enter: > 
a «SEVERITY FATAL 
00F 98014 76 ENDOF FIL <End of file encountered on a READ operation with no resulting indic 
OOF 9801C 77 ERRDURDSP <An error was detected during a DSPLY operation> 
OOF 98024 78 EXESUBALR <An attempt was made to execute a subroutine that is already being e 
OOF 9802C 79 EXTINDOFF <An attempt was made to perform I/0 to a file conditioned by an exte 
OOF 98034 80 FATINTERR <Fatal internal error> 
00F 9803C 81 FLDOUTSEQ <One of the matching fields in the current record is not in the spec 
OOF 98044 Hf HLTINDON <Halt indicator H!UB is on>/FAO = 1 
OOF 9804C 8 INVARG <Invalid argument> 
0F 98054 84 INVARRIND <An arrey index is greater than the number of elements in the array 
OF 9805C 85 INVNUMF LD <A numeric field contains invalid data> 
OOF 98064 86 INVUDATE <When you assign the logical RPGSUDATE, it must be in the format dd- 
OOF 9806C 87 KEYNOTFND <The key value specified by a CHAIN operation could not be found wit 
OOF 98074 88 KEYNOTMAT <Record key specified does not match any of the key(s) in the file> 
OOF 9807C 89 LESIN_TAB <A pre-execution-time table or array file contains less entries than 
00F 98084 90 IN <A pre-execution-time table or array file contains more entries than 
OOF 9808C 91 NONASCKEY <The record being written has a gensscencing primary key value> 
OOF 98094 92 ORGNOT IND <File organization is not indexed as specified> 
OOF 9809C 93 RECEXCMAX <The relative record number exceeds the maximum allowed value> 
OOF 980A4 94 RECNOTDET <The record type of the current record could not be determined> 
OOF 980AC 95 RECOUTSEQ <The current record is not in the specified sequence? 
OOF 980B4 96 TABOUTSEQ <The pre-execution-time table or array is not in the specified seque 
OOF 980BC 4 UPDNO_CUR <An update or delete was attempted with no current input record> 
99 - END 
100 
101 ! CEnd of file RPGMSG.MSG) 
There were 0 errors, 0 a eg and 0 informational messages issued. 
MESSAGE /F ILE_NAME=RPGMSG/LIS= 1$$:RPGMSGPTR/OBJ=0BJ$ : RPGMS PTR MSRC$:RPGMSG 
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